object Form1: TForm1
  Left = 215
  Top = 202
  Width = 870
  Height = 500
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Tool_1: TRzToolbar
    Left = 0
    Top = 0
    Width = 862
    Height = 29
    ButtonWidth = 60
    ShowButtonCaptions = True
    TextOptions = ttoCustom
    BorderInner = fsNone
    BorderOuter = fsGroove
    BorderSides = [sdTop]
    BorderWidth = 0
    TabOrder = 0
    VisualStyle = vsClassic
    ToolbarControls = (
      Btnx_1
      Btnx_2)
    object Btnx_1: TRzToolButton
      Left = 4
      Top = 2
      Caption = 'test'
      OnClick = Btnx_1Click
    end
    object Btnx_2: TRzToolButton
      Left = 64
      Top = 2
      Caption = 'exit'
      OnClick = Btnx_2Click
    end
  end
  object RzSplitter1: TRzSplitter
    Left = 0
    Top = 29
    Width = 862
    Height = 437
    Position = 333
    Percent = 39
    Align = alClient
    TabOrder = 1
    BarSize = (
      333
      0
      337
      437)
    UpperLeftControls = (
      Memo_2)
    LowerRightControls = (
      Memo_1)
    object Memo_2: TfsSyntaxMemo
      Left = 0
      Top = 0
      Width = 333
      Height = 437
      Cursor = crIBeam
      Align = alClient
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Courier New'
      Font.Style = []
      ParentColor = False
      ParentFont = False
      TabOrder = 0
      TabStop = True
      BlockColor = clHighlight
      BlockFontColor = clHighlightText
      CommentAttr.Charset = DEFAULT_CHARSET
      CommentAttr.Color = clNavy
      CommentAttr.Height = -13
      CommentAttr.Name = 'Courier New'
      CommentAttr.Style = [fsItalic]
      KeywordAttr.Charset = DEFAULT_CHARSET
      KeywordAttr.Color = clWindowText
      KeywordAttr.Height = -13
      KeywordAttr.Name = 'Courier New'
      KeywordAttr.Style = [fsBold]
      StringAttr.Charset = DEFAULT_CHARSET
      StringAttr.Color = clNavy
      StringAttr.Height = -13
      StringAttr.Name = 'Courier New'
      StringAttr.Style = []
      TextAttr.Charset = DEFAULT_CHARSET
      TextAttr.Color = clWindowText
      TextAttr.Height = -13
      TextAttr.Name = 'Courier New'
      TextAttr.Style = []
      Lines.Strings = (
        '')
      ReadOnly = False
      SyntaxType = stPascal
      ShowFooter = True
      ShowGutter = True
    end
    object Memo_1: TfsSyntaxMemo
      Left = 0
      Top = 0
      Width = 525
      Height = 437
      Cursor = crIBeam
      Align = alClient
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Courier New'
      Font.Style = []
      ParentColor = False
      ParentFont = False
      TabOrder = 0
      TabStop = True
      BlockColor = clHighlight
      BlockFontColor = clHighlightText
      CommentAttr.Charset = DEFAULT_CHARSET
      CommentAttr.Color = clNavy
      CommentAttr.Height = -13
      CommentAttr.Name = 'Courier New'
      CommentAttr.Style = [fsItalic]
      KeywordAttr.Charset = DEFAULT_CHARSET
      KeywordAttr.Color = clWindowText
      KeywordAttr.Height = -13
      KeywordAttr.Name = 'Courier New'
      KeywordAttr.Style = [fsBold]
      StringAttr.Charset = DEFAULT_CHARSET
      StringAttr.Color = clNavy
      StringAttr.Height = -13
      StringAttr.Name = 'Courier New'
      StringAttr.Style = []
      TextAttr.Charset = DEFAULT_CHARSET
      TextAttr.Color = clWindowText
      TextAttr.Height = -13
      TextAttr.Name = 'Courier New'
      TextAttr.Style = []
      Lines.Strings = (
        'function ShowMsg:string;'
        'begin'
        '  Result:=ValueInData('#39'DJLX'#39');'
        'end;'
        ''
        'begin'
        'end.')
      ReadOnly = False
      SyntaxType = stPascal
      ShowFooter = True
      ShowGutter = True
    end
  end
end
